home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-05 / seemail1.zip / UNPACK.BAT < prev    next >
DOS Batch File  |  1992-06-26  |  2KB  |  60 lines
  1. Echo Off
  2. REM UNPACK.BAT - Copies See Mail files to 4 x 360k diskettes.
  3.  
  4. if %1!==! Goto :Parms
  5. if %1!==?! Goto :Parms
  6. if %2!==! Goto :Parms
  7.  
  8. :Start
  9. For %%i in (A B D E a b d e) do If %1!==%%i! Goto :OK
  10. Goto :Parms
  11. :OK
  12. For %%i in (C D E F c d e f) do If %2!==%%i! Goto :OK1
  13. Goto :Parms
  14.  
  15. :OK1
  16. cls
  17. echo See Mail UNPACK for 360k diskettes - using drives %1: and %2:
  18. echo  
  19. echo  »»»  You will need four formatted 360k diskettes  «««
  20. echo  »»»  You will need four formatted 360k diskettes  «««
  21. echo  »»»  You will need four formatted 360k diskettes  «««
  22. echo  
  23. pause
  24.  
  25. cls
  26. echo Creating temporary directory...
  27. %2:
  28. md \$$unpack
  29. cd \$$unpack
  30. echo Copying files to hard disk %2
  31. copy %1:*.*
  32. copy %1:\manual\*.*
  33. unpack1 %1 %2
  34. goto :endbat
  35. :Parms
  36. cls
  37. echo 
  38. echo  
  39. echo UNPACK needs two parameters -
  40. echo  
  41. echo        First parameter is for the diskette drive
  42. echo        Second parameter is for hard disk to be used.
  43. echo  
  44. echo I.e. »»» UNPACK  A  C
  45. echo   or »»» UNPACK  B  D  etc, depending on which drives you have.
  46. echo  
  47. echo   A, B, D or E  is valid for the diskette drive,
  48. echo  
  49. echo   C, D, E or F  is valid for the hard drive (used for temporary files).
  50. echo  
  51. echo UNPACK will copy all the files off the diskette to a temporary directory
  52. echo on your hard drive.
  53. echo  
  54. echo It will then ask you to put in each 360k diskette and copy the right
  55. echo files to each 360k diskette.
  56. echo  
  57. echo When it has finished it will leave an empty directory $$unpack on your
  58. echo hard disk. Remove the $$unpack if you wish.
  59. :endbat
  60.